Why am I getting R-object of type 'closure' is not subsettable error in my R code

welcome to shbcf.ru